home *** CD-ROM | disk | FTP | other *** search
- /* -----------------------------------------------------------------------------
-
- Scan handler looking for assembler labes.
-
- Scan handlers are plain functions (loadSeg()'ed): no standard C startup
- code and no library calls permitted. We have to put string constants into
- the code segment (DICE compiler: option -ms1).
-
- DICE:
-
- dcc a68k.c -// -l0 -md -mRR -o golded:etc/scanner/a68k
-
- ------------------------------------------------------------------------------
- */
-
- #include <exec/types.h>
-
- ULONG
- ScanHandlerA68k(__D0 ULONG len, __A0 char **text, __A1 ULONG *line)
- {
- const char *version = "$VER: A68k 1.1 (" __COMMODORE_DATE__ ")";
-
- while (len && (**text == 32)) {
-
- ++*text;
- --len;
- }
-
- if ((len > 1) && (**text == '_'))
- return(len);
- else
- return(FALSE);
- }
-
-